<?php

function pwiki($str){
	do {
		$pos=strpos ( $str, '<PWiki>' );
		if($pos===false){echo $str;return;}
		if($pos>0){
			echo substr($str,0,$pos);
		}
		$str=substr($str,$pos+7);
		$pos=strpos ( $str, '</PWiki>');
		if($pos===false) {
			$wikistr=$str;
			$str='';
		} else {
			$wikistr=substr($str,0,$pos);
			$str=substr($str,$pos+8);
		}
		$wikistr=preg_replace ( "/^\s*\n/", '', $wikistr );
		$wikistr=preg_replace ( "/\n\s*$/", '', $wikistr );
		$wikistr=preg_replace ( '/([$]\w+)/', '<code class="PWiki">\1</code>', $wikistr );
		$wikistr=preg_replace ( '/^(\s*[$]\s.*)$/m', '<code class="PWiki">\1</code>', $wikistr );
		$wikistr=preg_replace ( '/(http:\/\/[a-zA-Z0-9.\/?=\-+&!%\$#@*\\\\]+)/', '<a class="PWiki" href="\1">\1</a>', $wikistr );
		$wikistr=preg_replace ( "/\n/", '<br>', $wikistr );
		echo $wikistr;

	} while($str!=='');	
	
}
